home *** CD-ROM | disk | FTP | other *** search
-
-
-
- LLLLSSSSAAAAMMMMEEEENNNN((((3333FFFF)))) LLLLSSSSAAAAMMMMEEEENNNN((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- LSAMEN - test if the first N letters of CA are the same as the first N
- letters of CB, regardless of case
-
- SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
- LOGICAL FUNCTION LSAMEN( N, CA, CB )
-
- CHARACTER*( * ) CA, CB
-
- INTEGER N
-
- PPPPUUUURRRRPPPPOOOOSSSSEEEE
- LSAMEN tests if the first N letters of CA are the same as the first N
- letters of CB, regardless of case. LSAMEN returns .TRUE. if CA and CB
- are equivalent except for case and .FALSE. otherwise. LSAMEN also
- returns .FALSE. if LEN( CA ) or LEN( CB ) is less than N.
-
-
- AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
- N (input) INTEGER
- The number of characters in CA and CB to be compared.
-
- CA (input) CHARACTER*(*)
- CB (input) CHARACTER*(*) CA and CB specify two character
- strings of length at least N. Only the first N characters of
- each string will be accessed.
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-